home *** CD-ROM | disk | FTP | other *** search
/ MacFormat España 25 / MacFormat n. 25 (Spain) / MacFormat 25.bin / mac / Demos / Print Artist Demo / PA12-Mac.Dxr / 00459.ls < prev    next >
Encoding:
Text File  |  1996-10-03  |  300 b   |  16 lines
  1. on msgJump
  2.   global loopOnce
  3.   if loopOnce = 0 then
  4.     startTimer()
  5.   end if
  6.   puppetSprite(16, 1)
  7.   if the timer > 260 then
  8.     set the memberNum of sprite 16 to the number of member ("msg" & string(random(22)))
  9.     updateStage()
  10.     startTimer()
  11.   else
  12.     set loopOnce to 1
  13.     exit
  14.   end if
  15. end
  16.